
Namespace WPF

    Public Class RecordSelectedRoutedEventArgs
        Inherits RoutedEventArgs

        Private _objValue As Object

        Public Sub New()
            MyBase.New()
        End Sub

        Public Sub New(ByVal routedEvent As System.Windows.RoutedEvent)
            MyBase.New(routedEvent)
        End Sub

        Public Sub New(ByVal routedEvent As System.Windows.RoutedEvent, ByVal source As Object)
            MyBase.New(routedEvent, source)
        End Sub

        Public Sub New(ByVal routedEvent As System.Windows.RoutedEvent, ByVal source As Object, ByVal objValue As Object)
            MyBase.New(routedEvent, source)
            _objValue = objValue
        End Sub

        Public Property Value() As Object
            Get
                Return _objValue
            End Get
            Set(ByVal Value As Object)
                _objValue = Value
            End Set
        End Property

    End Class

End Namespace
